Perl Multimedia Cyber Classroom/PERL Multimedia Cyber Classroom (Prentice Hall)(1998).ISO/perlbyex/code.jar/0aex010.jar/code/ch0a/0aex010/0aex010.pl

Text File | 1998-04-01 | 59b | 4 lines

$uid=9496;
$gid=4;
chown($uid, $gid, 'foo.p', 'boo.p');